home *** CD-ROM | disk | FTP | other *** search
/ Asobe! Fotoshock 5.0 ERO / Asobe! Fotoshock 5.0 ERO.iso / pc / tool.dxr / 00022_ëIëâèú.ls < prev    next >
Encoding:
Text File  |  1999-03-23  |  543 b   |  18 lines

  1. global gpartslist, gactivenum
  2.  
  3. on btncmd me
  4.   if gactivenum > 0 then
  5.     tell getAt(the windowList, 1)
  6.       if the ink of sprite gactivenum = 33 then
  7.         set the ink of sprite gactivenum to 36
  8.         set the loc of sprite gactivenum to the loc of sprite gactivenum
  9.         set the moveableSprite of sprite gactivenum to 0
  10.         set the pm of getAt(the scriptInstanceList of sprite gactivenum, 1) to 1
  11.         set gactivenum to 0
  12.       end if
  13.     end tell
  14.   else
  15.     alert("テォIテォツ敕ッテョテッ邃「テ‡邃「テ‡窶 テ‡テ凝‡窶ケテ‡テセテ‡テ津③")
  16.   end if
  17. end
  18.